<!DOCTYPE html>
<html lang="en">
  <head>
    <meta charset="utf-8">
    <meta http-equiv="X-UA-Compatible" content="IE=edge">
    <meta name="viewport" content="width=device-width, initial-scale=1">
	 
	 <meta name="description" content="XDMF parallel partitioned mesh I/O on top of HDF5">
    
    <meta name="author" content="Víctor Sande Veiga" >
    <link rel="icon" href="../favicon.png">

    <title>steps_handler_test &ndash; XH5For</title>

    <link href="../css/bootstrap.min.css" rel="stylesheet">
    <link href="../css/pygments.css" rel="stylesheet">
    <link href="../css/font-awesome.min.css" rel="stylesheet">
    <link href="../css/local.css" rel="stylesheet">
    

    <!-- HTML5 shim and Respond.js for IE8 support of HTML5 elements and media queries -->
    <!--[if lt IE 9]>
      <script src="https://oss.maxcdn.com/html5shiv/3.7.2/html5shiv.min.js"></script>
      <script src="https://oss.maxcdn.com/respond/1.4.2/respond.min.js"></script>
    <![endif]-->
    
    <script src="../js/jquery-2.1.3.min.js"></script>
    <script src="../js/svg-pan-zoom.min.js"></script>

  </head>

  <body>

    <!-- Fixed navbar -->
    <nav class="navbar navbar-inverse navbar-fixed-top">
      <div class="container">
        <div class="navbar-header">
          <button type="button" class="navbar-toggle collapsed" data-toggle="collapse" data-target="#navbar" aria-expanded="false" aria-controls="navbar">
            <span class="sr-only">Toggle navigation</span>
            <span class="icon-bar"></span>
            <span class="icon-bar"></span>
            <span class="icon-bar"></span>
          </button>
          <a class="navbar-brand" href="../index.html">XH5For </a>
        </div>
        <div id="navbar" class="navbar-collapse collapse">
          <ul class="nav navbar-nav">
				
            <li class="dropdown hidden-xs visible-sm visible-md hidden-lg">
              <a href="#" class="dropdown-toggle"
              data-toggle="dropdown" role="button"
              aria-haspopup="true"
		 aria-expanded="false">Contents <span class="caret"></span></a>
	      <ul class="dropdown-menu">
              
            <li><a href="../lists/files.html">Source Files</a></li>
				
				
            <li><a href="../lists/modules.html">Modules</a></li>
				
            
                                
            <li><a href="../lists/procedures.html">Procedures</a></li>
				
								
            <li><a href="../lists/types.html">Derived Types</a></li>
				
				
            <li><a href="../lists/programs.html">Programs</a></li>
				
            </ul>
            </li>

<li class="visible-xs hidden-sm visible-lg"><a href="../lists/files.html">Source Files</a></li>


<li class="visible-xs hidden-sm visible-lg"><a href="../lists/modules.html">Modules</a></li>



<li class="visible-xs hidden-sm visible-lg"><a href="../lists/procedures.html">Procedures</a></li>

                             
<li class="visible-xs hidden-sm visible-lg"><a href="../lists/types.html">Derived Types</a></li>


<li class="visible-xs hidden-sm visible-lg"><a href="../lists/programs.html">Programs</a></li>

          </ul>
        
        <form action="../search.html" class="navbar-form navbar-right" role="search">
        <div class="form-group">
          <input type="text" class="form-control" placeholder="Search" name="q" id="tipue_search_input" autocomplete="off" required>
        </div>
<!--
        <button type="submit" class="btn btn-default">Submit</button>
-->
        </form>
        
        </div><!--/.nav-collapse -->
      </div>
    </nav>

    <div class="container">
    
  
  <div class="row">
    <h1>steps_handler_test
    <small>Program</small>
    
    </h1>
    
<div class="row">
  <div class="col-lg-12">
<div class="well well-sm">
  <ul class="list-inline" style="margin-bottom:0px;display:inline">
     
     
     
     
    
    
     <li><i class="fa fa-list-ol"></i>
       <a data-toggle="tooltip"
	  data-placement="bottom" data-html="true"
	  title=" 2.1% of total for programs.">51 statements</a>
     </li> 
     
     
    <li><i class="fa fa-code"></i><a href="../src/steps_handler_test.f90"> Source File</a></li>
     
  </ul>
  <ol class="breadcrumb in-well text-right">
  
     <li><a href='../sourcefile/steps_handler_test.f90.html'>steps_handler_test.f90</a></li>
  
     <li class="active">steps_handler_test</li>
  </ol>
</div>
</div>
</div>
<script>
  $(function () {
  $('[data-toggle="tooltip"]').tooltip()
  })
</script>

  </div>
  
  <div class="row">
    <div class="col-md-3 hidden-xs hidden-sm visible-md visible-lg">
    
<div id="sidebar">
  


<div class="panel panel-primary">
  <div class="panel-heading text-left"><h3 class="panel-title"><a data-toggle="collapse" href="#vars-0">Variables</a></h3></div>
  <div id="vars-0" class="panel-collapse collapse">
    <div class="list-group">
      
      <a class="list-group-item" href="../program/steps_handler_test.html#variable-mpienv%7E7">mpienv</a>
      
      <a class="list-group-item" href="../program/steps_handler_test.html#variable-timesteps">TimeSteps</a>
      
      <a class="list-group-item" href="../program/steps_handler_test.html#variable-i%7E15">i</a>
      
      <a class="list-group-item" href="../program/steps_handler_test.html#variable-mpierr%7E8">mpierr</a>
      
      <a class="list-group-item" href="../program/steps_handler_test.html#variable-numberofsteps">NumberOfSteps</a>
      
    </div>
  </div>
</div>



















<div class="panel panel-primary">
  <div class="panel-heading text-left"><h3 class="panel-title">Source Code</h3></div>
  <div class="list-group">
    <a class="list-group-item" href="../program/steps_handler_test.html#src">steps_handler_test</a>
  </div>
</div>


  <hr>
  

<div class="panel panel-default">
  <div class="panel-heading text-left"><h3 class="panel-title"><a data-toggle="collapse" href="#allprogs-0">All Programs</a></h3></div>
  <div id="allprogs-0" class="panel-collapse collapse">
    <div class="list-group">
      
      <a class="list-group-item" href="../program/ch_unstructured_hexahedron.html">ch_unstructured_hexahedron</a>
      
      <a class="list-group-item" href="../program/steps_handler_test.html">steps_handler_test</a>
      
      <a class="list-group-item" href="../program/test_hdf5_hyperslabs_handler.html">test_hdf5_hyperslabs_handler</a>
      
      <a class="list-group-item" href="../program/test_hdf5_rect_dpp_handler.html">test_hdf5_rect_dpp_handler</a>
      
      <a class="list-group-item" href="../program/test_hdf5_rect_hyperslabs_handler.html">test_hdf5_rect_hyperslabs_handler</a>
      
      <a class="list-group-item" href="../program/test_hdf5_reg_dpp_handler.html">test_hdf5_reg_dpp_handler</a>
      
      <a class="list-group-item" href="../program/test_hdf5_reg_hyperslabs_handler.html">test_hdf5_reg_hyperslabs_handler</a>
      
      <a class="list-group-item" href="../program/test_hdf5_uns_hyperslabs_handler.html">test_hdf5_uns_hyperslabs_handler</a>
      
      <a class="list-group-item" href="../program/test_mpi_environment.html">test_mpi_environment</a>
      
      <a class="list-group-item" href="../program/test_xdmf_attribute.html">test_xdmf_attribute</a>
      
      <a class="list-group-item" href="../program/test_xdmf_character_data.html">test_xdmf_character_data</a>
      
      <a class="list-group-item" href="../program/test_xdmf_dataitem.html">test_xdmf_dataitem</a>
      
      <a class="list-group-item" href="../program/test_xdmf_geometry.html">test_xdmf_geometry</a>
      
      <a class="list-group-item" href="../program/test_xdmf_grid.html">test_xdmf_grid</a>
      
      <a class="list-group-item" href="../program/test_xdmf_rect_dpp_handler.html">test_xdmf_rect_dpp_handler</a>
      
      <a class="list-group-item" href="../program/test_xdmf_rect_hyperslabs_handler.html">test_xdmf_rect_hyperslabs_handler</a>
      
      <a class="list-group-item" href="../program/test_xdmf_reg_ddp_handler.html">test_xdmf_reg_ddp_handler</a>
      
      <a class="list-group-item" href="../program/test_xdmf_reg_hyperslabs_handler.html">test_xdmf_reg_hyperslabs_handler</a>
      
      <a class="list-group-item" href="../program/test_xdmf_time.html">test_xdmf_time</a>
      
      <a class="list-group-item" href="../program/test_xdmf_topology.html">test_xdmf_topology</a>
      
      <a class="list-group-item" href="../program/test_xdmf_uns_ddp_handler.html">test_xdmf_uns_ddp_handler</a>
      
      <a class="list-group-item" href="../program/test_xdmf_uns_hyperslabs_handler.html">test_xdmf_uns_hyperslabs_handler</a>
      
      <a class="list-group-item" href="../program/test_xdmf_xinclude.html">test_xdmf_xinclude</a>
      
      <a class="list-group-item" href="../program/try_compile_hdf5_mod.html">try_compile_hdf5_mod</a>
      
      <a class="list-group-item" href="../program/try_compile_mpi_mod.html">try_compile_mpi_mod</a>
      
      <a class="list-group-item" href="../program/wxml_example.html">wxml_example</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_rectilinear_grid.html">xh5for_ch_rectilinear_grid</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_rectilinear_grid%7E2.html">xh5for_ch_rectilinear_grid</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_rectilinear_grid%7E3.html">xh5for_ch_rectilinear_grid</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_regular_grid.html">xh5for_ch_regular_grid</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_regular_grid%7E2.html">xh5for_ch_regular_grid</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_regular_grid%7E3.html">xh5for_ch_regular_grid</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_regular_grid%7E4.html">xh5for_ch_regular_grid</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_regular_grid%7E5.html">xh5for_ch_regular_grid</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_unstructured_hexahedron.html">xh5for_ch_unstructured_hexahedron</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_unstructured_hexahedron%7E2.html">xh5for_ch_unstructured_hexahedron</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_unstructured_mixedtopology.html">xh5for_ch_unstructured_mixedtopology</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_unstructured_mixedtopology%7E2.html">xh5for_ch_unstructured_mixedtopology</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_unstructured_quadrilateral.html">xh5for_ch_unstructured_quadrilateral</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_unstructured_tetrahedron.html">xh5for_ch_unstructured_tetrahedron</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_unstructured_tetrahedron%7E2.html">xh5for_ch_unstructured_tetrahedron</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_unstructured_tetrahedron%7E3.html">xh5for_ch_unstructured_tetrahedron</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_unstructured_tetrahedron%7E4.html">xh5for_ch_unstructured_tetrahedron</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_unstructured_tetrahedron%7E5.html">xh5for_ch_unstructured_tetrahedron</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_unstructured_triangles.html">xh5for_ch_unstructured_triangles</a>
      
      <a class="list-group-item" href="../program/xh5for_dpp_rectilinear_grid.html">xh5for_dpp_rectilinear_grid</a>
      
      <a class="list-group-item" href="../program/xh5for_dpp_rectilinear_grid%7E2.html">xh5for_dpp_rectilinear_grid</a>
      
      <a class="list-group-item" href="../program/xh5for_dpp_rectilinear_grid%7E3.html">xh5for_dpp_rectilinear_grid</a>
      
      <a class="list-group-item" href="../program/xh5for_dpp_regular_grid.html">xh5for_dpp_regular_grid</a>
      
      <a class="list-group-item" href="../program/xh5for_dpp_unstructured_hexahedron.html">xh5for_dpp_unstructured_hexahedron</a>
      
      <a class="list-group-item" href="../program/xh5for_dpp_unstructured_mixedtopology.html">xh5for_dpp_unstructured_mixedtopology</a>
      
      <a class="list-group-item" href="../program/xh5for_dpp_unstructured_quadrilateral.html">xh5for_dpp_unstructured_quadrilateral</a>
      
      <a class="list-group-item" href="../program/xh5for_dpp_unstructured_tetrahedron.html">xh5for_dpp_unstructured_tetrahedron</a>
      
      <a class="list-group-item" href="../program/xh5for_dpp_unstructured_triangles.html">xh5for_dpp_unstructured_triangles</a>
      
    </div>
  </div>
</div>


</div>  

    </div>
    
    <div class="col-md-9" id='text'>
    
  
    <ul class="list-inline">
      <li><h4>Uses:</h4></li>
      
      <li><a href='../module/mpi_environment.html'>mpi_environment</a></li>
      
      <li><a href='../module/steps_handler.html'>steps_handler</a></li>
      
      <li>PENF</li>
      
    </ul>
    
                <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
 "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
<!-- Generated by graphviz version 2.38.0 (20140413.2041)
 -->
<!-- Title: program~~steps_handler_test~~UsesGraph Pages: 1 -->
<svg id="programsteps_handler_testUsesGraph" width="641pt" height="168pt"
 viewBox="0.00 0.00 641.00 167.91" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
<g id="program~~steps_handler_test~~UsesGraph" class="graph" transform="scale(0.778858 0.778858) rotate(0) translate(4 211.583)">
<title>program~~steps_handler_test~~UsesGraph</title>
<polygon fill="white" stroke="none" points="-4,4 -4,-211.583 819,-211.583 819,4 -4,4"/>
<!-- program~steps_handler_test -->
<g id="program~~steps_handler_test~~UsesGraph_node1" class="node"><title>program~steps_handler_test</title>
<polygon fill="none" stroke="black" points="815,-171.834 712,-171.834 712,-147.834 815,-147.834 815,-171.834"/>
<text text-anchor="middle" x="763.5" y="-157.434" font-family="Helvetica,sans-Serif" font-size="10.50">steps_handler_test</text>
</g>
<!-- module~mpi_environment -->
<g id="program~~steps_handler_test~~UsesGraph_node2" class="node"><title>module~mpi_environment</title>
<g id="a_program~~steps_handler_test~~UsesGraph_node2"><a xlink:href="../module/mpi_environment.html" xlink:title="mpi_environment">
<polygon fill="#337ab7" stroke="#337ab7" points="560,-131.834 465,-131.834 465,-107.834 560,-107.834 560,-131.834"/>
<text text-anchor="middle" x="512.5" y="-117.434" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">mpi_environment</text>
</a>
</g>
</g>
<!-- module~mpi_environment&#45;&gt;program~steps_handler_test -->
<g id="program~~steps_handler_test~~UsesGraph_edge15" class="edge"><title>module~mpi_environment&#45;&gt;program~steps_handler_test</title>
<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M560.302,-123.783C592.89,-126.904 637.277,-131.897 676,-138.834 686.259,-140.672 697.117,-143 707.545,-145.431"/>
<polygon fill="#000000" stroke="#000000" points="706.839,-148.86 717.379,-147.781 708.466,-142.052 706.839,-148.86"/>
</g>
<!-- module~steps_handler -->
<g id="program~~steps_handler_test~~UsesGraph_node4" class="node"><title>module~steps_handler</title>
<g id="a_program~~steps_handler_test~~UsesGraph_node4"><a xlink:href="../module/steps_handler.html" xlink:title="steps_handler">
<polygon fill="#337ab7" stroke="#337ab7" points="676,-171.834 596,-171.834 596,-147.834 676,-147.834 676,-171.834"/>
<text text-anchor="middle" x="636" y="-157.434" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">steps_handler</text>
</a>
</g>
</g>
<!-- module~mpi_environment&#45;&gt;module~steps_handler -->
<g id="program~~steps_handler_test~~UsesGraph_edge14" class="edge"><title>module~mpi_environment&#45;&gt;module~steps_handler</title>
<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M549.954,-131.836C562.097,-135.833 575.79,-140.341 588.584,-144.553"/>
<polygon fill="#000000" stroke="#000000" points="587.559,-147.901 598.152,-147.703 589.748,-141.252 587.559,-147.901"/>
</g>
<!-- PENF -->
<g id="program~~steps_handler_test~~UsesGraph_node3" class="node"><title>PENF</title>
<polygon fill="#337ab7" stroke="#337ab7" points="54,-49.8343 0,-49.8343 0,-25.8343 54,-25.8343 54,-49.8343"/>
<text text-anchor="middle" x="27" y="-35.4343" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">PENF</text>
</g>
<!-- PENF&#45;&gt;program~steps_handler_test -->
<g id="program~~steps_handler_test~~UsesGraph_edge16" class="edge"><title>PENF&#45;&gt;program~steps_handler_test</title>
<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M513.5,-199.834C585.807,-192.149 604.425,-193.658 676,-180.834 686.259,-178.996 697.117,-176.669 707.545,-174.238"/>
<polygon fill="#000000" stroke="#000000" points="708.466,-177.617 717.379,-171.888 706.839,-170.808 708.466,-177.617"/>
</g>
<!-- PENF&#45;&gt;module~mpi_environment -->
<g id="program~~steps_handler_test~~UsesGraph_edge10" class="edge"><title>PENF&#45;&gt;module~mpi_environment</title>
<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M54.0635,-26.894C64.9626,-22.8789 77.8895,-18.8296 90,-16.8343 193.494,0.217072 224.462,9.46455 326,-16.8343 389.505,-33.2823 454.424,-76.6907 488.058,-101.59"/>
<polygon fill="#000000" stroke="#000000" points="486.206,-104.576 496.302,-107.789 490.413,-98.9817 486.206,-104.576"/>
</g>
<!-- PENF&#45;&gt;module~steps_handler -->
<g id="program~~steps_handler_test~~UsesGraph_edge12" class="edge"><title>PENF&#45;&gt;module~steps_handler</title>
<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M139.5,-139.834C178.424,-153.771 183.058,-170.162 223,-180.834 347.145,-214.006 383.414,-210.139 511.5,-199.834"/>
<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M513.5,-199.834C543.584,-196.637 576.056,-185.515 599.856,-175.808"/>
<polygon fill="#000000" stroke="#000000" points="601.303,-178.997 609.17,-171.901 598.595,-172.542 601.303,-178.997"/>
</g>
<!-- module~xh5for_utils -->
<g id="program~~steps_handler_test~~UsesGraph_node5" class="node"><title>module~xh5for_utils</title>
<g id="a_program~~steps_handler_test~~UsesGraph_node5"><a xlink:href="../module/xh5for_utils.html" xlink:title="xh5for_utils">
<polygon fill="#337ab7" stroke="#337ab7" points="429,-131.834 362,-131.834 362,-107.834 429,-107.834 429,-131.834"/>
<text text-anchor="middle" x="395.5" y="-117.434" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xh5for_utils</text>
</a>
</g>
</g>
<!-- PENF&#45;&gt;module~xh5for_utils -->
<g id="program~~steps_handler_test~~UsesGraph_edge7" class="edge"><title>PENF&#45;&gt;module~xh5for_utils</title>
<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M139.5,-139.834C158.977,-146.548 284.211,-133.019 351.643,-125.067"/>
<polygon fill="#000000" stroke="#000000" points="352.427,-128.498 361.944,-123.842 351.6,-121.547 352.427,-128.498"/>
</g>
<!-- module~xh5for_parameters -->
<g id="program~~steps_handler_test~~UsesGraph_node7" class="node"><title>module~xh5for_parameters</title>
<g id="a_program~~steps_handler_test~~UsesGraph_node7"><a xlink:href="../module/xh5for_parameters.html" xlink:title="xh5for_parameters">
<polygon fill="#337ab7" stroke="#337ab7" points="326,-171.834 223,-171.834 223,-147.834 326,-147.834 326,-171.834"/>
<text text-anchor="middle" x="274.5" y="-157.434" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xh5for_parameters</text>
</a>
</g>
</g>
<!-- PENF&#45;&gt;module~xh5for_parameters -->
<g id="program~~steps_handler_test~~UsesGraph_edge1" class="edge"><title>PENF&#45;&gt;module~xh5for_parameters</title>
<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M139.5,-139.834C162.745,-147.847 189.349,-152.65 212.693,-155.53"/>
<polygon fill="#000000" stroke="#000000" points="212.488,-159.029 222.821,-156.686 213.282,-152.074 212.488,-159.029"/>
</g>
<!-- module~xdmf_utils -->
<g id="program~~steps_handler_test~~UsesGraph_node8" class="node"><title>module~xdmf_utils</title>
<g id="a_program~~steps_handler_test~~UsesGraph_node8"><a xlink:href="../module/xdmf_utils.html" xlink:title="xdmf_utils">
<polygon fill="#337ab7" stroke="#337ab7" points="305,-49.8343 244,-49.8343 244,-25.8343 305,-25.8343 305,-49.8343"/>
<text text-anchor="middle" x="274.5" y="-35.4343" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xdmf_utils</text>
</a>
</g>
</g>
<!-- PENF&#45;&gt;module~xdmf_utils -->
<g id="program~~steps_handler_test~~UsesGraph_edge5" class="edge"><title>PENF&#45;&gt;module~xdmf_utils</title>
<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M35.7723,-49.9946C51.5356,-73.302 89.8494,-123.409 137.5,-139.834"/>
<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M139.5,-139.834C188.381,-156.683 181.165,-89.2168 223,-58.8343 226.642,-56.1892 230.667,-53.8036 234.808,-51.6721"/>
<polygon fill="#000000" stroke="#000000" points="236.37,-54.8058 243.956,-47.4097 233.413,-48.4608 236.37,-54.8058"/>
</g>
<!-- module~xdmf_parameters -->
<g id="program~~steps_handler_test~~UsesGraph_node10" class="node"><title>module~xdmf_parameters</title>
<g id="a_program~~steps_handler_test~~UsesGraph_node10"><a xlink:href="../module/xdmf_parameters.html" xlink:title="xdmf_parameters">
<polygon fill="#337ab7" stroke="#337ab7" points="187,-49.8343 90,-49.8343 90,-25.8343 187,-25.8343 187,-49.8343"/>
<text text-anchor="middle" x="138.5" y="-35.4343" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xdmf_parameters</text>
</a>
</g>
</g>
<!-- PENF&#45;&gt;module~xdmf_parameters -->
<g id="program~~steps_handler_test~~UsesGraph_edge2" class="edge"><title>PENF&#45;&gt;module~xdmf_parameters</title>
<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M54.228,-37.8343C61.951,-37.8343 70.7244,-37.8343 79.6086,-37.8343"/>
<polygon fill="#000000" stroke="#000000" points="79.636,-41.3344 89.636,-37.8343 79.6359,-34.3344 79.636,-41.3344"/>
</g>
<!-- module~steps_handler&#45;&gt;program~steps_handler_test -->
<g id="program~~steps_handler_test~~UsesGraph_edge17" class="edge"><title>module~steps_handler&#45;&gt;program~steps_handler_test</title>
<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M676.021,-159.834C684.192,-159.834 692.993,-159.834 701.743,-159.834"/>
<polygon fill="#000000" stroke="#000000" points="701.949,-163.334 711.949,-159.834 701.949,-156.334 701.949,-163.334"/>
</g>
<!-- module~xh5for_utils&#45;&gt;module~mpi_environment -->
<g id="program~~steps_handler_test~~UsesGraph_edge11" class="edge"><title>module~xh5for_utils&#45;&gt;module~mpi_environment</title>
<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M429.147,-119.834C437.07,-119.834 445.772,-119.834 454.46,-119.834"/>
<polygon fill="#000000" stroke="#000000" points="454.606,-123.334 464.606,-119.834 454.606,-116.334 454.606,-123.334"/>
</g>
<!-- iso_c_binding -->
<g id="program~~steps_handler_test~~UsesGraph_node6" class="node"><title>iso_c_binding</title>
<g id="a_program~~steps_handler_test~~UsesGraph_node6"><a xlink:href="https://software.intel.com/en-us/node/511038" xlink:title="iso_c_binding">
<polygon fill="#337ab7" stroke="#337ab7" points="313.5,-91.8343 235.5,-91.8343 235.5,-67.8343 313.5,-67.8343 313.5,-91.8343"/>
<text text-anchor="middle" x="274.5" y="-77.4343" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_c_binding</text>
</a>
</g>
</g>
<!-- iso_c_binding&#45;&gt;module~xh5for_utils -->
<g id="program~~steps_handler_test~~UsesGraph_edge6" class="edge"><title>iso_c_binding&#45;&gt;module~xh5for_utils</title>
<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M311.204,-91.8356C324.095,-96.1687 338.77,-101.102 352.174,-105.607"/>
<polygon fill="#000000" stroke="#000000" points="351.071,-108.929 361.665,-108.797 353.302,-102.294 351.071,-108.929"/>
</g>
<!-- module~xh5for_parameters&#45;&gt;module~steps_handler -->
<g id="program~~steps_handler_test~~UsesGraph_edge13" class="edge"><title>module~xh5for_parameters&#45;&gt;module~steps_handler</title>
<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.245,-159.834C395.189,-159.834 517.65,-159.834 585.79,-159.834"/>
<polygon fill="#000000" stroke="#000000" points="585.84,-163.334 595.839,-159.834 585.839,-156.334 585.84,-163.334"/>
</g>
<!-- module~xh5for_parameters&#45;&gt;module~xh5for_utils -->
<g id="program~~steps_handler_test~~UsesGraph_edge8" class="edge"><title>module~xh5for_parameters&#45;&gt;module~xh5for_utils</title>
<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M311.204,-147.833C324.095,-143.5 338.77,-138.567 352.174,-134.062"/>
<polygon fill="#000000" stroke="#000000" points="353.302,-137.375 361.665,-130.871 351.071,-130.74 353.302,-137.375"/>
</g>
<!-- module~xdmf_utils&#45;&gt;module~xh5for_utils -->
<g id="program~~steps_handler_test~~UsesGraph_edge9" class="edge"><title>module~xdmf_utils&#45;&gt;module~xh5for_utils</title>
<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.166,-48.2348C312.224,-51.2282 319.567,-54.7941 326,-58.8343 344.713,-70.5874 363.265,-87.5221 376.334,-100.568"/>
<polygon fill="#000000" stroke="#000000" points="373.855,-103.039 383.354,-107.731 378.854,-98.1388 373.855,-103.039"/>
</g>
<!-- iso_fortran_env -->
<g id="program~~steps_handler_test~~UsesGraph_node9" class="node"><title>iso_fortran_env</title>
<g id="a_program~~steps_handler_test~~UsesGraph_node9"><a xlink:href="https://software.intel.com/en-us/node/511041" xlink:title="iso_fortran_env">
<polygon fill="#337ab7" stroke="#337ab7" points="182,-91.8343 95,-91.8343 95,-67.8343 182,-67.8343 182,-91.8343"/>
<text text-anchor="middle" x="138.5" y="-77.4343" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
</a>
</g>
</g>
<!-- iso_fortran_env&#45;&gt;module~xdmf_utils -->
<g id="program~~steps_handler_test~~UsesGraph_edge3" class="edge"><title>iso_fortran_env&#45;&gt;module~xdmf_utils</title>
<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M177.899,-67.7988C195.354,-62.3277 215.998,-55.8573 233.627,-50.3318"/>
<polygon fill="#000000" stroke="#000000" points="235.116,-53.5331 243.611,-47.2023 233.022,-46.8535 235.116,-53.5331"/>
</g>
<!-- module~xdmf_parameters&#45;&gt;module~xdmf_utils -->
<g id="program~~steps_handler_test~~UsesGraph_edge4" class="edge"><title>module~xdmf_parameters&#45;&gt;module~xdmf_utils</title>
<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M187.121,-37.8343C202.375,-37.8343 219.096,-37.8343 233.728,-37.8343"/>
<polygon fill="#000000" stroke="#000000" points="233.964,-41.3344 243.964,-37.8343 233.964,-34.3344 233.964,-41.3344"/>
</g>
</g>
</svg>
</div>
                <script>var panprogramsteps_handler_testUsesGraph = svgPanZoom('#programsteps_handler_testUsesGraph', {
                    zoomEnabled: true,
                    controlIconsEnabled: true,
                    fit: true,
                    center: true,});
                    </script>
                <div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div>
                <div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog">
                  <div class="modal-dialog modal-lg" role="document">
                    <div class="modal-content">
                      <div class="modal-header">
                        <button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button>
                        <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
                      </div>
                      <div class="modal-body">
                        
    <p>Nodes of different colours represent the following: </p>
    <?xml version="1.0" encoding="UTF-8" standalone="no"?>
<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
 "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
<!-- Generated by graphviz version 2.38.0 (20140413.2041)
 -->
<!-- Title: Graph Key Pages: 1 -->
<svg width="490pt" height="32pt"
 viewBox="0.00 0.00 489.50 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
<g id="graph0" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
<title>Graph Key</title>
<polygon fill="white" stroke="none" points="-4,4 -4,-28 485.5,-28 485.5,4 -4,4"/>
<!-- Module -->
<g id="node1" class="node"><title>Module</title>
<polygon fill="#337ab7" stroke="#337ab7" points="54,-24 0,-24 0,-0 54,-0 54,-24"/>
<text text-anchor="middle" x="27" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Module</text>
</g>
<!-- Submodule -->
<g id="node2" class="node"><title>Submodule</title>
<polygon fill="#5bc0de" stroke="#5bc0de" points="139.5,-24 72.5,-24 72.5,-0 139.5,-0 139.5,-24"/>
<text text-anchor="middle" x="106" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Submodule</text>
</g>
<!-- Subroutine -->
<g id="node3" class="node"><title>Subroutine</title>
<polygon fill="#d9534f" stroke="#d9534f" points="222,-24 158,-24 158,-0 222,-0 222,-24"/>
<text text-anchor="middle" x="190" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
</g>
<!-- Function -->
<g id="node4" class="node"><title>Function</title>
<polygon fill="#d94e8f" stroke="#d94e8f" points="294,-24 240,-24 240,-0 294,-0 294,-24"/>
<text text-anchor="middle" x="267" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
</g>
<!-- Program -->
<g id="node5" class="node"><title>Program</title>
<polygon fill="#f0ad4e" stroke="#f0ad4e" points="366,-24 312,-24 312,-0 366,-0 366,-24"/>
<text text-anchor="middle" x="339" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
</g>
<!-- This Page&#39;s Entity -->
<g id="node6" class="node"><title>This Page&#39;s Entity</title>
<polygon fill="none" stroke="black" points="481.5,-24 384.5,-24 384.5,-0 481.5,-0 481.5,-24"/>
<text text-anchor="middle" x="433" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
</g>
</g>
</svg>

    
    <p>Solid arrows point from a parent (sub)module to the submodule which is
    descended from it. Dashed arrows point from a module being used to the
    module or program unit using it.
    </p>
    
                      </div>
                    </div>
                  </div>
                </div>
                
    

    <br><br>
    
    
     <h3>Calls</h3>
     
                <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
 "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
<!-- Generated by graphviz version 2.38.0 (20140413.2041)
 -->
<!-- Title: program~~steps_handler_test~~CallsGraph Pages: 1 -->
<svg id="programsteps_handler_testCallsGraph" width="201pt" height="32pt"
 viewBox="0.00 0.00 201.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
<g id="program~~steps_handler_test~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
<title>program~~steps_handler_test~~CallsGraph</title>
<polygon fill="white" stroke="none" points="-4,4 -4,-28 197,-28 197,4 -4,4"/>
<!-- program~steps_handler_test -->
<g id="program~~steps_handler_test~~CallsGraph_node1" class="node"><title>program~steps_handler_test</title>
<polygon fill="none" stroke="black" points="103,-24 0,-24 0,-0 103,-0 103,-24"/>
<text text-anchor="middle" x="51.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">steps_handler_test</text>
</g>
<!-- str -->
<g id="program~~steps_handler_test~~CallsGraph_node2" class="node"><title>str</title>
<polygon fill="#777777" stroke="#777777" points="193,-24 139,-24 139,-0 193,-0 193,-24"/>
<text text-anchor="middle" x="166" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">str</text>
</g>
<!-- program~steps_handler_test&#45;&gt;str -->
<g id="program~~steps_handler_test~~CallsGraph_edge1" class="edge"><title>program~steps_handler_test&#45;&gt;str</title>
<path fill="none" stroke="#000000" d="M103.155,-12C111.752,-12 120.525,-12 128.66,-12"/>
<polygon fill="#000000" stroke="#000000" points="128.919,-15.5001 138.919,-12 128.918,-8.5001 128.919,-15.5001"/>
</g>
</g>
</svg>
</div>
                <div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div>
                <div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog">
                  <div class="modal-dialog modal-lg" role="document">
                    <div class="modal-content">
                      <div class="modal-header">
                        <button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button>
                        <h4 class="modal-title" id="-graph-help-label">Graph Key</h4>
                      </div>
                      <div class="modal-body">
                        
    <p>Nodes of different colours represent the following: </p>
    <?xml version="1.0" encoding="UTF-8" standalone="no"?>
<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
 "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
<!-- Generated by graphviz version 2.38.0 (20140413.2041)
 -->
<!-- Title: Graph Key Pages: 1 -->
<svg width="560pt" height="32pt"
 viewBox="0.00 0.00 559.50 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
<g id="graph0" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
<title>Graph Key</title>
<polygon fill="white" stroke="none" points="-4,4 -4,-28 555.5,-28 555.5,4 -4,4"/>
<!-- Subroutine -->
<g id="node1" class="node"><title>Subroutine</title>
<polygon fill="#d9534f" stroke="#d9534f" points="64,-24 0,-24 0,-0 64,-0 64,-24"/>
<text text-anchor="middle" x="32" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
</g>
<!-- Function -->
<g id="node2" class="node"><title>Function</title>
<polygon fill="#d94e8f" stroke="#d94e8f" points="136,-24 82,-24 82,-0 136,-0 136,-24"/>
<text text-anchor="middle" x="109" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
</g>
<!-- Interface -->
<g id="node3" class="node"><title>Interface</title>
<polygon fill="#a7506f" stroke="#a7506f" points="209.5,-24 154.5,-24 154.5,-0 209.5,-0 209.5,-24"/>
<text text-anchor="middle" x="182" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Interface</text>
</g>
<!-- Unknown Procedure Type -->
<g id="node4" class="node"><title>Unknown Procedure Type</title>
<polygon fill="#777777" stroke="#777777" points="364,-24 228,-24 228,-0 364,-0 364,-24"/>
<text text-anchor="middle" x="296" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Unknown Procedure Type</text>
</g>
<!-- Program -->
<g id="node5" class="node"><title>Program</title>
<polygon fill="#f0ad4e" stroke="#f0ad4e" points="436,-24 382,-24 382,-0 436,-0 436,-24"/>
<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
</g>
<!-- This Page&#39;s Entity -->
<g id="node6" class="node"><title>This Page&#39;s Entity</title>
<polygon fill="none" stroke="black" points="551.5,-24 454.5,-24 454.5,-0 551.5,-0 551.5,-24"/>
<text text-anchor="middle" x="503" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
</g>
</g>
</svg>

    
    <p>Solid arrows point from a procedure to one which it calls. Dashed 
    arrows point from an interface to procedures which implement that interface.
    This could include the module procedures in a generic interface or the
    implementation in a submodule of an interface in a parent module.
    </p>
    
                      </div>
                    </div>
                  </div>
                </div>
                
     
    <br>

     <section class="visible-xs visible-sm hidden-md">
       


<div class="panel panel-primary">
  <div class="panel-heading text-left"><h3 class="panel-title"><a data-toggle="collapse" href="#vars-1">Variables</a></h3></div>
  <div id="vars-1" class="panel-collapse collapse">
    <div class="list-group">
      
      <a class="list-group-item" href="../program/steps_handler_test.html#variable-mpienv%7E7">mpienv</a>
      
      <a class="list-group-item" href="../program/steps_handler_test.html#variable-timesteps">TimeSteps</a>
      
      <a class="list-group-item" href="../program/steps_handler_test.html#variable-i%7E15">i</a>
      
      <a class="list-group-item" href="../program/steps_handler_test.html#variable-mpierr%7E8">mpierr</a>
      
      <a class="list-group-item" href="../program/steps_handler_test.html#variable-numberofsteps">NumberOfSteps</a>
      
    </div>
  </div>
</div>



















<div class="panel panel-primary">
  <div class="panel-heading text-left"><h3 class="panel-title">Source Code</h3></div>
  <div class="list-group">
    <a class="list-group-item" href="../program/steps_handler_test.html#src">steps_handler_test</a>
  </div>
</div>


     </section>
     <br class="visible-xs visible-sm hidden-md">

     

    
    <section>
    <h2>Variables</h2>
    
<table class="table table-striped varlist">
<thead><tr><th>Type</th>

<th>Attributes</th><th></th><th>Name</th><th></th><th>Initial</th><th></th></thead>



<tbody>

  
  
  
  
<tr>
  
  <td><span class="anchor" id="variable-mpienv%7E7"></span>type(<a href='../type/mpi_env_t.html'>mpi_env_t</a>)</td>
  
  
  <td></td><td>::</td>
  <td><strong>mpienv</strong></td><td></td><td></td><td></td>
  
</tr>

  
  
  
  
<tr>
  
  <td><span class="anchor" id="variable-timesteps"></span>type(<a href='../type/steps_handler_t.html'>steps_handler_t</a>)</td>
  
  
  <td></td><td>::</td>
  <td><strong>TimeSteps</strong></td><td></td><td></td><td></td>
  
</tr>

  
  
  
  
<tr>
  
  <td><span class="anchor" id="variable-i%7E15"></span>integer(kind=I4P)</td>
  
  
  <td></td><td>::</td>
  <td><strong>i</strong></td><td></td><td></td><td></td>
  
</tr>

  
  
  
  
<tr>
  
  <td><span class="anchor" id="variable-mpierr%7E8"></span>integer(kind=I4P)</td>
  
  
  <td></td><td>::</td>
  <td><strong>mpierr</strong></td><td></td><td></td><td></td>
  
</tr>

  
  
  
  
<tr>
  
  <td><span class="anchor" id="variable-numberofsteps"></span>integer(kind=I4P)</td>
  
  
  <td></td><td>::</td>
  <td><strong>NumberOfSteps</strong></td><td></td><td></td><td></td>
  
</tr>

</tbody>
</table>

    </section>
    <br>
    
    
    
    
    
    
    

    
    
    


    
    
    
    <section>
    <h2 id="src">Source Code</h2>
    <div class="highlight"><pre><span class="k">program </span><span class="n">steps_handler_test</span>

<span class="k">use </span><span class="n">mpi_environment</span>
<span class="k">use </span><span class="n">steps_handler</span>
<span class="k">use </span><span class="n">PENF</span><span class="p">,</span> <span class="n">only</span><span class="p">:</span> <span class="n">I4P</span><span class="p">,</span> <span class="n">R4P</span><span class="p">,</span> <span class="n">R8P</span><span class="p">,</span> <span class="n">str</span>

<span class="cp">#ifdef MPI_MOD</span>
  <span class="k">use </span><span class="n">mpi</span>
<span class="cp">#endif</span>
<span class="k">implicit none</span>
<span class="cp">#ifdef MPI_H</span>
  <span class="k">include</span> <span class="s1">&#39;mpif.h&#39;</span>
<span class="cp">#endif</span>

    <span class="k">type</span><span class="p">(</span><span class="n">mpi_env_t</span><span class="p">)</span>       <span class="kd">::</span> <span class="n">mpienv</span>
    <span class="k">type</span><span class="p">(</span><span class="n">steps_handler_t</span><span class="p">)</span> <span class="kd">::</span> <span class="n">TimeSteps</span>
    <span class="kt">integer</span><span class="p">(</span><span class="n">I4P</span><span class="p">)</span>          <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">mpierr</span><span class="p">,</span> <span class="n">NumberOfSteps</span>

<span class="cp">#if defined(MPI_MOD) || defined(MPI_H)</span>
    <span class="k">call </span><span class="n">MPI_INIT</span><span class="p">(</span><span class="n">mpierr</span><span class="p">)</span>
<span class="cp">#endif</span>

    <span class="k">call </span><span class="n">mpienv</span><span class="p">%</span><span class="n">initialize</span><span class="p">()</span>
    <span class="k">call </span><span class="n">TimeSteps</span><span class="p">%</span><span class="n">initialize</span><span class="p">(</span><span class="n">mpienv</span><span class="p">)</span>

    <span class="n">NumberOfSteps</span> <span class="o">=</span> <span class="mi">12_I4P</span>

    <span class="k">print</span><span class="o">*</span><span class="p">,</span> <span class="s1">&#39;Initial number of steps:&#39;</span><span class="p">,</span> <span class="n">TimeSteps</span><span class="p">%</span><span class="n">GetNumberOfSteps</span><span class="p">()</span>
    <span class="k">print</span><span class="o">*</span><span class="p">,</span> <span class="s1">&#39;Adding steps ... &#39;</span>
    <span class="k">do </span><span class="n">i</span><span class="o">=</span><span class="mi">1</span><span class="p">,</span> <span class="n">NumberOfSteps</span>
        <span class="k">if</span><span class="p">(</span><span class="nb">mod</span><span class="p">(</span><span class="n">i</span><span class="p">,</span><span class="mi">2</span><span class="p">)</span><span class="o">==</span><span class="mi">0</span><span class="p">)</span> <span class="k">then</span>
<span class="k">            call </span><span class="n">TimeSteps</span><span class="p">%</span><span class="n">Append</span><span class="p">(</span><span class="k">Value</span><span class="o">=</span><span class="kt">real</span><span class="p">(</span><span class="n">i</span><span class="p">,</span> <span class="n">R4P</span><span class="p">))</span>
            <span class="k">print</span><span class="o">*</span><span class="p">,</span> <span class="s1">&#39;Number of step:&#39;</span><span class="p">,</span> <span class="n">TimeSteps</span><span class="p">%</span><span class="n">GetCurrentStep</span><span class="p">(),</span> <span class="s1">&#39;with value:&#39;</span><span class="p">,</span> <span class="n">TimeSteps</span><span class="p">%</span><span class="n">GetCurrentValue</span><span class="p">()</span>
        <span class="k">else</span>
<span class="k">            call </span><span class="n">TimeSteps</span><span class="p">%</span><span class="n">Append</span><span class="p">(</span><span class="k">Value</span><span class="o">=</span><span class="kt">real</span><span class="p">(</span><span class="n">i</span><span class="p">,</span> <span class="n">R8P</span><span class="p">))</span>
            <span class="k">print</span><span class="o">*</span><span class="p">,</span> <span class="s1">&#39;Number of step:&#39;</span><span class="p">,</span> <span class="n">TimeSteps</span><span class="p">%</span><span class="n">GetCurrentStep</span><span class="p">(),</span> <span class="s1">&#39;with value:&#39;</span><span class="p">,</span> <span class="n">TimeSteps</span><span class="p">%</span><span class="n">GetStepValue</span><span class="p">(</span><span class="n">StepNumber</span><span class="o">=</span><span class="n">TimeSteps</span><span class="p">%</span><span class="n">GetCurrentStep</span><span class="p">())</span>
        <span class="n">endif</span>
    <span class="n">enddo</span>

    <span class="k">print</span><span class="o">*</span><span class="p">,</span> <span class="s1">&#39;Total number of steps:&#39;</span><span class="p">,</span> <span class="n">TimeSteps</span><span class="p">%</span><span class="n">GetNumberOfSteps</span><span class="p">()</span>
    <span class="k">print</span><span class="o">*</span><span class="p">,</span> <span class="s1">&#39;&#39;</span>
    <span class="k">print</span><span class="o">*</span><span class="p">,</span> <span class="s1">&#39;Iterate over steps:&#39;</span><span class="p">,</span> <span class="n">TimeSteps</span><span class="p">%</span><span class="n">GetNumberOfSteps</span><span class="p">()</span>
    <span class="k">call </span><span class="n">TimeSteps</span><span class="p">%</span><span class="n">Begin</span><span class="p">()</span>
    <span class="k">do while</span> <span class="p">(.</span><span class="nb">not</span><span class="p">.</span> <span class="n">TimeSteps</span><span class="p">%</span><span class="n">Hasfinished</span><span class="p">())</span>
        <span class="k">print</span><span class="o">*</span><span class="p">,</span> <span class="s1">&#39;Number of step:&#39;</span><span class="p">,</span> <span class="n">TimeSteps</span><span class="p">%</span><span class="n">GetCurrentStep</span><span class="p">(),</span> <span class="s1">&#39;with value:&#39;</span><span class="p">,</span> <span class="n">TimeSteps</span><span class="p">%</span><span class="n">GetCurrentValue</span><span class="p">()</span>
        <span class="k">call </span><span class="n">TimeSteps</span><span class="p">%</span><span class="n">Next</span><span class="p">()</span>
    <span class="n">enddo</span>
    <span class="k">print</span><span class="o">*</span><span class="p">,</span> <span class="s1">&#39;Freeing ... &#39;</span>
    <span class="k">call </span><span class="n">TimeSteps</span><span class="p">%</span><span class="n">Free</span><span class="p">()</span>

    <span class="k">call </span><span class="n">TimeSteps</span><span class="p">%</span><span class="n">initialize</span><span class="p">(</span><span class="n">mpienv</span><span class="p">)</span>
    <span class="k">print</span><span class="o">*</span><span class="p">,</span> <span class="s1">&#39;&#39;</span>
    <span class="k">print</span><span class="o">*</span><span class="p">,</span> <span class="s1">&#39;Initial number of steps:&#39;</span><span class="p">,</span> <span class="n">TimeSteps</span><span class="p">%</span><span class="n">GetNumberOfSteps</span><span class="p">()</span>
    <span class="k">print</span><span class="o">*</span><span class="p">,</span> <span class="s1">&#39;Adding steps ... &#39;</span>
    <span class="k">do </span><span class="n">i</span><span class="o">=</span><span class="n">NumberOfSteps</span><span class="p">,</span> <span class="mi">1</span><span class="p">,</span> <span class="o">-</span><span class="mi">1</span>
        <span class="k">if</span><span class="p">(</span><span class="nb">mod</span><span class="p">(</span><span class="n">i</span><span class="p">,</span><span class="mi">2</span><span class="p">)</span><span class="o">==</span><span class="mi">0</span><span class="p">)</span> <span class="k">then</span>
<span class="k">            call </span><span class="n">TimeSteps</span><span class="p">%</span><span class="n">Append</span><span class="p">(</span><span class="n">Filename</span><span class="o">=</span><span class="s1">&#39;Filename_&#39;</span><span class="o">//</span><span class="nb">trim</span><span class="p">(</span><span class="nb">adjustl</span><span class="p">(</span><span class="n">str</span><span class="p">(</span><span class="n">no_sign</span><span class="o">=</span><span class="p">.</span><span class="n">true</span><span class="p">.,</span> <span class="n">n</span><span class="o">=</span><span class="n">i</span><span class="p">))))</span>
            <span class="k">call </span><span class="n">TimeSteps</span><span class="p">%</span><span class="n">SetCurrentValue</span><span class="p">(</span><span class="k">Value</span><span class="o">=</span><span class="kt">real</span><span class="p">(</span><span class="n">i</span><span class="p">,</span> <span class="n">R8P</span><span class="p">))</span>
            <span class="k">print</span><span class="o">*</span><span class="p">,</span> <span class="s1">&#39;Number of step:&#39;</span><span class="p">,</span> <span class="n">TimeSteps</span><span class="p">%</span><span class="n">GetCurrentStep</span><span class="p">(),</span> <span class="s1">&#39;with value:&#39;</span><span class="p">,</span> <span class="n">TimeSteps</span><span class="p">%</span><span class="n">GetCurrentValue</span><span class="p">(),</span> <span class="s1">&#39;in file: &#39;</span><span class="p">,</span> <span class="n">TimeSteps</span><span class="p">%</span><span class="n">GetStepFilename</span><span class="p">(</span><span class="n">StepNumber</span><span class="o">=</span><span class="n">TimeSteps</span><span class="p">%</span><span class="n">GetCurrentStep</span><span class="p">())</span>

        <span class="k">else</span>
<span class="k">            call </span><span class="n">TimeSteps</span><span class="p">%</span><span class="n">Append</span><span class="p">(</span><span class="k">Value</span><span class="o">=</span><span class="kt">real</span><span class="p">(</span><span class="n">i</span><span class="p">,</span> <span class="n">R8P</span><span class="p">))</span>
            <span class="k">print</span><span class="o">*</span><span class="p">,</span> <span class="s1">&#39;Number of step:&#39;</span><span class="p">,</span> <span class="n">TimeSteps</span><span class="p">%</span><span class="n">GetCurrentStep</span><span class="p">(),</span> <span class="s1">&#39;with value:&#39;</span><span class="p">,</span> <span class="n">TimeSteps</span><span class="p">%</span><span class="n">GetStepValue</span><span class="p">(</span><span class="n">StepNumber</span><span class="o">=</span><span class="n">TimeSteps</span><span class="p">%</span><span class="n">GetCurrentStep</span><span class="p">())</span>
        <span class="n">endif</span>
    <span class="n">enddo</span>

    <span class="k">print</span><span class="o">*</span><span class="p">,</span> <span class="s1">&#39;Total number of steps:&#39;</span><span class="p">,</span> <span class="n">TimeSteps</span><span class="p">%</span><span class="n">GetNumberOfSteps</span><span class="p">()</span>
    <span class="k">print</span><span class="o">*</span><span class="p">,</span> <span class="s1">&#39;Freeing ... &#39;</span>
    <span class="k">call </span><span class="n">TimeSteps</span><span class="p">%</span><span class="n">Free</span><span class="p">()</span>
    <span class="k">call </span><span class="n">mpienv</span><span class="p">%</span><span class="n">Free</span><span class="p">()</span>

<span class="cp">#if defined(MPI_MOD) || defined(MPI_H)</span>
    <span class="k">call </span><span class="n">MPI_FINALIZE</span><span class="p">(</span><span class="n">mpierr</span><span class="p">)</span>
<span class="cp">#endif</span>


<span class="k">end program </span><span class="n">steps_handler_test</span>
</pre></div>

    </section>
    
    
    </div>
  </div>

  <section class="visible-xs visible-sm hidden-md">
    <hr>
    

<div class="panel panel-default">
  <div class="panel-heading text-left"><h3 class="panel-title"><a data-toggle="collapse" href="#allprogs-1">All Programs</a></h3></div>
  <div id="allprogs-1" class="panel-collapse collapse">
    <div class="list-group">
      
      <a class="list-group-item" href="../program/ch_unstructured_hexahedron.html">ch_unstructured_hexahedron</a>
      
      <a class="list-group-item" href="../program/steps_handler_test.html">steps_handler_test</a>
      
      <a class="list-group-item" href="../program/test_hdf5_hyperslabs_handler.html">test_hdf5_hyperslabs_handler</a>
      
      <a class="list-group-item" href="../program/test_hdf5_rect_dpp_handler.html">test_hdf5_rect_dpp_handler</a>
      
      <a class="list-group-item" href="../program/test_hdf5_rect_hyperslabs_handler.html">test_hdf5_rect_hyperslabs_handler</a>
      
      <a class="list-group-item" href="../program/test_hdf5_reg_dpp_handler.html">test_hdf5_reg_dpp_handler</a>
      
      <a class="list-group-item" href="../program/test_hdf5_reg_hyperslabs_handler.html">test_hdf5_reg_hyperslabs_handler</a>
      
      <a class="list-group-item" href="../program/test_hdf5_uns_hyperslabs_handler.html">test_hdf5_uns_hyperslabs_handler</a>
      
      <a class="list-group-item" href="../program/test_mpi_environment.html">test_mpi_environment</a>
      
      <a class="list-group-item" href="../program/test_xdmf_attribute.html">test_xdmf_attribute</a>
      
      <a class="list-group-item" href="../program/test_xdmf_character_data.html">test_xdmf_character_data</a>
      
      <a class="list-group-item" href="../program/test_xdmf_dataitem.html">test_xdmf_dataitem</a>
      
      <a class="list-group-item" href="../program/test_xdmf_geometry.html">test_xdmf_geometry</a>
      
      <a class="list-group-item" href="../program/test_xdmf_grid.html">test_xdmf_grid</a>
      
      <a class="list-group-item" href="../program/test_xdmf_rect_dpp_handler.html">test_xdmf_rect_dpp_handler</a>
      
      <a class="list-group-item" href="../program/test_xdmf_rect_hyperslabs_handler.html">test_xdmf_rect_hyperslabs_handler</a>
      
      <a class="list-group-item" href="../program/test_xdmf_reg_ddp_handler.html">test_xdmf_reg_ddp_handler</a>
      
      <a class="list-group-item" href="../program/test_xdmf_reg_hyperslabs_handler.html">test_xdmf_reg_hyperslabs_handler</a>
      
      <a class="list-group-item" href="../program/test_xdmf_time.html">test_xdmf_time</a>
      
      <a class="list-group-item" href="../program/test_xdmf_topology.html">test_xdmf_topology</a>
      
      <a class="list-group-item" href="../program/test_xdmf_uns_ddp_handler.html">test_xdmf_uns_ddp_handler</a>
      
      <a class="list-group-item" href="../program/test_xdmf_uns_hyperslabs_handler.html">test_xdmf_uns_hyperslabs_handler</a>
      
      <a class="list-group-item" href="../program/test_xdmf_xinclude.html">test_xdmf_xinclude</a>
      
      <a class="list-group-item" href="../program/try_compile_hdf5_mod.html">try_compile_hdf5_mod</a>
      
      <a class="list-group-item" href="../program/try_compile_mpi_mod.html">try_compile_mpi_mod</a>
      
      <a class="list-group-item" href="../program/wxml_example.html">wxml_example</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_rectilinear_grid.html">xh5for_ch_rectilinear_grid</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_rectilinear_grid%7E2.html">xh5for_ch_rectilinear_grid</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_rectilinear_grid%7E3.html">xh5for_ch_rectilinear_grid</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_regular_grid.html">xh5for_ch_regular_grid</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_regular_grid%7E2.html">xh5for_ch_regular_grid</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_regular_grid%7E3.html">xh5for_ch_regular_grid</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_regular_grid%7E4.html">xh5for_ch_regular_grid</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_regular_grid%7E5.html">xh5for_ch_regular_grid</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_unstructured_hexahedron.html">xh5for_ch_unstructured_hexahedron</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_unstructured_hexahedron%7E2.html">xh5for_ch_unstructured_hexahedron</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_unstructured_mixedtopology.html">xh5for_ch_unstructured_mixedtopology</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_unstructured_mixedtopology%7E2.html">xh5for_ch_unstructured_mixedtopology</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_unstructured_quadrilateral.html">xh5for_ch_unstructured_quadrilateral</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_unstructured_tetrahedron.html">xh5for_ch_unstructured_tetrahedron</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_unstructured_tetrahedron%7E2.html">xh5for_ch_unstructured_tetrahedron</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_unstructured_tetrahedron%7E3.html">xh5for_ch_unstructured_tetrahedron</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_unstructured_tetrahedron%7E4.html">xh5for_ch_unstructured_tetrahedron</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_unstructured_tetrahedron%7E5.html">xh5for_ch_unstructured_tetrahedron</a>
      
      <a class="list-group-item" href="../program/xh5for_ch_unstructured_triangles.html">xh5for_ch_unstructured_triangles</a>
      
      <a class="list-group-item" href="../program/xh5for_dpp_rectilinear_grid.html">xh5for_dpp_rectilinear_grid</a>
      
      <a class="list-group-item" href="../program/xh5for_dpp_rectilinear_grid%7E2.html">xh5for_dpp_rectilinear_grid</a>
      
      <a class="list-group-item" href="../program/xh5for_dpp_rectilinear_grid%7E3.html">xh5for_dpp_rectilinear_grid</a>
      
      <a class="list-group-item" href="../program/xh5for_dpp_regular_grid.html">xh5for_dpp_regular_grid</a>
      
      <a class="list-group-item" href="../program/xh5for_dpp_unstructured_hexahedron.html">xh5for_dpp_unstructured_hexahedron</a>
      
      <a class="list-group-item" href="../program/xh5for_dpp_unstructured_mixedtopology.html">xh5for_dpp_unstructured_mixedtopology</a>
      
      <a class="list-group-item" href="../program/xh5for_dpp_unstructured_quadrilateral.html">xh5for_dpp_unstructured_quadrilateral</a>
      
      <a class="list-group-item" href="../program/xh5for_dpp_unstructured_tetrahedron.html">xh5for_dpp_unstructured_tetrahedron</a>
      
      <a class="list-group-item" href="../program/xh5for_dpp_unstructured_triangles.html">xh5for_dpp_unstructured_triangles</a>
      
    </div>
  </div>
</div>


  </section>
  
    <hr>    
    </div> <!-- /container -->
    <footer>
      <div class="container">
      <div class="row">
        <div class="col-xs-6 col-md-4"><p>&copy; 2016 </p></div>
        <div class="col-xs-6 col-md-4 col-md-push-4">
          <p class="text-right">
            Documentation generated by 
            <a href="https://github.com/cmacmackin/ford">FORD</a>
             on 2016-11-08T12:24:53.235950 
          </p>
        </div>
        <div class="col-xs-12 col-md-4 col-md-pull-4"><p class="text-center"> XH5For was developed by Víctor Sande Veiga</p></div>
      </div>
      <br>
      </div> <!-- /container -->    
    </footer>

    <!-- Bootstrap core JavaScript
    ================================================== -->
    <!-- Placed at the end of the document so the pages load faster -->
<!--
    <script src="https://ajax.googleapis.com/ajax/libs/jquery/1.11.1/jquery.min.js"></script>
-->
    <script src="../js/bootstrap.min.js"></script>
    <!-- IE10 viewport hack for Surface/desktop Windows 8 bug -->
    <script src="../js/ie10-viewport-bug-workaround.js"></script>

    <!-- MathJax JavaScript
    ================================================== -->
    <!-- Placed at the end of the document so the pages load faster -->
    <script type="text/x-mathjax-config">
      MathJax.Hub.Config({
        TeX: { extensions: ['AMSmath.js','AMSsymbols.js','noErrors.js','noUndefined.js'], equationNumbers: { autoNumber: 'AMS' } },
        jax: ['input/TeX','input/MathML','output/HTML-CSS'],
        extensions: ['tex2jax.js','mml2jax.js','MathMenu.js','MathZoom.js'],
        'HTML-CSS': { 
           styles: { '.MathJax_Display, .MathJax .mo, .MathJax .mi, .MathJax .mn': {color: '#000000 ! important'} }
        }
      });
    </script>
    <script src="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML"></script>
    
    
    <script src="../tipuesearch/tipuesearch_content.js"></script>
    <link  href="../tipuesearch/tipuesearch.css" rel="stylesheet">
    <script src="../tipuesearch/tipuesearch_set.js"></script>
    <script src="../tipuesearch/tipuesearch.js"></script>
    
    
  </body>
</html>